Estos son algunos lugares de la República Mexicana que me gustaría visitar lo antes posible, no tienen un orden específico. Me gustaría ir a Nuevo León por que sé que es una ciudad extraordinaria dentro de México y pienso que ahí se deben comer cortes de canre muy deliciosos. Me gustaría ir a puerto vallarta para darme un respiro de la pandemia y disfrutar la playa con una chelita. Me gustaría ir a Cancún principalmente en la temporada de Spring break para conocer a personas de otros países y salir de fiesta con todos. Iría a Mérida principalente para conocer las pirámides tan conocidad de los mayas y conocer acerca de nuestra cultura prehispanica. Me gustaria visitar ensenada para recorrer la ruta del vino y conocer su proceso de elaboración al mismo tiempo que lo voy degustando. Y por último me gustaría conocer Guanajuato para ver las tan conocidas e impresionantes momias de ese lugar y tambien conocer con mi pareja el callejón del beso.
Puedes escribir en cursivas
O negritas
También puedes poner imágenes:
Referencia uno, Hola
Referencia dos, K
Referencia tres, ASE
---
title: "Mis futuros viajes"
author: "David Silva Campos"
output:
flexdashboard::flex_dashboard:
orientation: rows
vertical_layout: scroll
favicon: escudo.jpg
logo: escudo.jpg
fig_mobile: TRUE
theme: cosmo
social: menu
source_code: embed
navbar:
- {title: "Crea tu propio mapa", href: "https://rstudio.cloud/project/2897129", align: right, icon: fa-map-marker}
- {title: "Taller III, Economía UNAM", href: "http://www.economia.unam.mx/", align: right, icon: fa-school}
---
```{r global, include=FALSE}
library(leaflet)
library(leaflet.extras)
```
Mapa {data-icon="fa-map"}
=====================================
Row
-----------------------------------------------------------------------
### Título del mapa
```{r}
### Registramos la información de los lugares
lugar1 <- c(Nombre = "Nuevo León", Giro = "Carnitas", longitud = -100.309, latitud = 25.6714)
lugar2 <- c(Nombre = "Puerto Vallarta", Giro = "Playita", longitud = -105.207, latitud = 20.667)
lugar3 <- c(Nombre = "Cancún", Giro = "Spring break", longitud = -86.8465, latitud = 21.1743)
lugar4 <- c(Nombre = "Mérida", Giro = "Pirámides", longitud = -89.62, latitud = 20.97)
lugar5 <- c(Nombre = "Ensenada", Giro = "Ruta del Vino", longitud = -116.6007, latitud = 31.8715)
lugar6 <- c(Nombre = "Guanajuato", Giro = "Momias", longitud = -101.2416, latitud = 21.0333)
### Creamos una tabla de datos con la información de los lugares
lugares <- data.frame(rbind(lugar1, lugar2, lugar3, lugar4, lugar5, lugar6))
### Nos aseguramos de que la latitud y longitud sean números
lugares$longitud <- as.numeric(lugares$longitud)
lugares$latitud <- as.numeric(lugares$latitud)
### Creamos el mapa
mapa <- leaflet(lugares) %>% setView(lng = -99.3, lat = 19.4, zoom = 5) %>% addTiles() %>% addMarkers(~longitud, ~latitud, popup = paste(sep = "
", "Nombre:", lugares$Nombre, "Giro:", lugares$Giro))
### Agregamos el botón de reset y la barra de herramientas de dibujo al mapa
mapa %>% addResetMapButton() %>% addDrawToolbar(editOptions = editToolbarOptions(selectedPathOptions = selectedPathOptions()))
### Imprimimos el mapa
mapa
```
Row
-----------------------------------------------------------------------
### Descripción del mapa
Estos son algunos lugares de la República Mexicana que me gustaría visitar lo antes posible, no tienen un orden específico. Me gustaría ir a Nuevo León por que sé que es una ciudad extraordinaria dentro de México y pienso que ahí se deben comer cortes de canre muy deliciosos. Me gustaría ir a puerto vallarta para darme un respiro de la pandemia y disfrutar la playa con una chelita. Me gustaría ir a Cancún principalmente en la temporada de Spring break para conocer a personas de otros países y salir de fiesta con todos. Iría a Mérida principalente para conocer las pirámides tan conocidad de los mayas y conocer acerca de nuestra cultura prehispanica. Me gustaria visitar ensenada para recorrer la ruta del vino y conocer su proceso de elaboración al mismo tiempo que lo voy degustando. Y por último me gustaría conocer Guanajuato para ver las tan conocidas e impresionantes momias de ese lugar y tambien conocer con mi pareja el callejón del beso.
*Puedes escribir en cursivas*
**O negritas**
También puedes poner imágenes:
{heigth="150"}
[O hipervínculos, por ejemplo a Google](https://www.google.com.mx/)
Row
-----------------------------------------------------------------------
### Referencias
1. Referencia uno, Hola
2. Referencia dos, K
3. Referencia tres, ASE